Option Explicit
Sub I_Sample012()
    Dim mySht As Worksheet
    Set mySht = Worksheets(1)			'N
    mySht.PrintPreview Enablechanges:=False
    Set mySht = Nothing				'
End Sub
